function function_plot(x)
global J;

global f_minpower;

global f_maxthroughput;

global f_minBER;

global f;

global current_generation_decoded;

global Pe_average;

figure(1);subplot(4,1,1);plot(x,max(f),'r*--');

hold on;

%plot(x,mean(f),'p');

%hold on;

subplot(4,1,2);

hold off;

[k,l] = max(f);

power = current_generation_decoded(l,1:2:end);

modulation = current_generation_decoded(l,2:2:end);

bar(power);

hold on;

subplot(4,1,4);bar(J);

hold off;

subplot(4,1,3);bar(modulation);





%==========================================================================
% global Pe_average;
% 
% [k,l] = max(f);
% 
% power = current_generation_decoded(l,1:2:end);
% 
% modulation = current_generation_decoded(l,2:2:end);
% 
% %figure(1);semilogy(x,Pe_average(l),'go');
% 
% %figure(1);plot(x,sum(power),'ro');
% 
% figure(1);plot(x,sum(modulation),'bo');
% 
% hold on;

















%==========================================================================



